home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / doors_1 / diz2153.zip / PROUT1.BAT < prev    next >
DOS Batch File  |  1993-04-03  |  2KB  |  72 lines

  1. @echo off
  2. proecho %3 ~∙ Testing: %2~
  3. didtest %2 %PCBDRIVE%%PCBDIR%\DIDTEST.LOG
  4. if errorlevel==1 goto end
  5. goto start
  6.  
  7. rem --  ╒════════════════════════════════════════════════╕
  8. rem --  │ Process a single upload file - for ProDoor     │
  9. rem --  │ Passed Parameters:                             │
  10. rem --  │ ■ %1  Log File                                 │
  11. rem --  │ ■ %2  File to Test                             │
  12. rem --  │ ■ %3  COM Port                                 │
  13. rem --  │ ■ %4  Conference Number                        │
  14. rem --  │ ■ %5  Play Directory                           │
  15. rem --  │ ■ %6  PCB Directory                            │
  16. rem --  ╘════════════════════════════════════════════════╛
  17.  
  18. :start
  19. rem -- ** These commands only work when running under 4DOS!
  20. if %@ext[%2] == gif goto gif
  21. if %@ext[%2] == zip goto zip
  22. if %@ext[%2] == arj goto arj
  23. if %@ext[%2] == lzh goto lzh
  24. goto end
  25.  
  26. :gif
  27. giftest %2 /A/B:3/D/E/F:%PCBDRIVE%%PCBDIR%\$DOOR.NAM/L/M:321x201x16/P:%3
  28. goto end
  29.  
  30. :lzh
  31. proecho %3 ∙ CRC Test...
  32. c:\utility\lharc t %2
  33. if errorlevel 1 goto err
  34. proecho %3 Passed!~
  35. proecho %3 ∙ Checking for FILE_ID.DIZ...
  36. diz-2 diz-2.cnf %2 %PCBDRIVE%%PCBDIR%\$door.nam %PCBNODE%
  37. if errorlevel==29 proecho %3 Found!~
  38. if errorlevel==0 proecho %3 Not Found!~
  39.  
  40. goto end
  41.  
  42. :arj
  43. proecho %3 ∙ CRC Test...
  44. c:\utility\arj t %2
  45. if errorlevel 1 goto err
  46. proecho %3 Passed!~
  47. proecho %3 ∙ Checking for FILE_ID.DIZ...
  48. diz-2 diz-2.cnf %2 %PCBDRIVE%%PCBDIR%\$door.nam %PCBNODE%
  49. if errorlevel==29 proecho %3 Found!~
  50. if errorlevel==0 proecho %3 Not Found!~
  51. goto end
  52.  
  53. :zip
  54. proecho %3 ∙ CRC Test...
  55. c:\utility\pkunZIP -t %2
  56. if errorlevel 1 goto err
  57. proecho %3 Passed!~
  58. proecho %3 ∙ Checking for FILE_ID.DIZ...
  59. diz-2 diz-2.cnf %2 %PCBDRIVE%%PCBDIR%\$door.nam %PCBNODE%
  60. if errorlevel==29 proecho %3 Found!~
  61. if errorlevel==0 proecho %3 Not Found!~
  62. rem ** if registered add zip comment => recom -c c:\diz-2\diz2-c.%PCBNODE%
  63. goto end
  64.  
  65. :err
  66. proecho %3 Failed!~
  67. proecho %3 ~Moving Offline for the SysOp to check.~
  68. move %2 c:\reject
  69. goto end
  70.  
  71. :end
  72.